home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 9 / The PC-SIG Library on CD ROM - Ninth Edition.iso / 2101_200 / DISK2170 / DISK2170.ZIP / PC_SUMRY < prev    next >
Text File  |  1989-11-13  |  10KB  |  344 lines
  1. /*****************************************************************************
  2.  
  3. pc_sumry
  4.  
  5. personal computer utilities function summary
  6.  
  7. Luis Larzabal    November 11, 1989
  8.  
  9. Included are a few examples of, cursor (), painta (), and boxc (), for 
  10. curiosities sake.  The implementation of all these interrupt calls are generic
  11. and your intuition should guide you to it's multiple possibilities.
  12.  
  13. *****************************************************************************/
  14.  
  15. rd_vmod ()                 /* read current video mode | pg.182 */
  16.  
  17. /*-----------------------------------------------*/
  18.  
  19. rd_adp ()            /* read current active display page | pg.182 */
  20.  
  21. /*-----------------------------------------------*/
  22.  
  23. rd_row ()                /* read cursor row position | pg.175 */
  24.  
  25. /*-----------------------------------------------*/
  26.  
  27. rd_col ()                /* read cursor col position | pg.175 */
  28.  
  29. /*-----------------------------------------------*/
  30.  
  31. rd_vchar (page)            /* read character @ cursor position | pg.177 */
  32. unsigned int page;        /* video page number ; normally rd_vchar(0), */
  33.                 /* or use rd_vchar(rd_adp()) */
  34.  
  35. /*-----------------------------------------------*/
  36.  
  37. rd_attr (page)            /* read attribute @ cursor position | pg.177 */
  38. unsigned int page;        /* video page number ; normally rd_vchar(0), */
  39.                 /* or use rd_vchar(rd_adp()) */
  40.  
  41. /*-----------------------------------------------*/
  42.  
  43. wr_vmod (mode)                    /* write video mode | pg.172 */
  44. unsigned int mode;                /* see fig.9-2 on pg.172 */
  45.  
  46. /*-----------------------------------------------*/
  47.  
  48. wr_adp (page)            /* write active display page | pg.176 */
  49. unsigned int page;        /* video page number ; normally wr_adp(0) */
  50.  
  51. /*-----------------------------------------------*/
  52.  
  53. wr_tty (charac)                /* write char in TTY mode | pg.182 */
  54. unsigned char charac;                /* character to write */
  55.  
  56. /*-----------------------------------------------*/
  57.  
  58. cls ()                    /* clear monochrome screen | pg.173 */
  59.  
  60. /*-----------------------------------------------*/
  61.  
  62. cursor (row, col)        /* write cursor position | pg.174 */
  63.                 /* 0 <= row <= 24  (to make visible) */
  64.                 /* 0 <= col <= 79  (to make visible) */
  65.                 /* upper left = 0,0 ; bottom right = 24,79 */
  66. unsigned int row;
  67. unsigned int col;
  68.  
  69.     cursor (0, 0);                /* cursor @ home */
  70.     cursor (24, 79);            /* cursor @ bottom right */
  71.     cursor (11, 39);            /* cursor @ middle */
  72.     cursor (rd_row()+2, rd_col()+3);    /* move relative */
  73.  
  74. /*-----------------------------------------------*/
  75.  
  76. cursor_status (mode)        /* monochrome cursor ON or OFF | pg.173 */
  77.                 /* ON = 1 ; OFF = 0 */
  78. unsigned int mode;        /* cls() resets cursor ON */
  79.  
  80. /*-----------------------------------------------*/
  81.  
  82. paintc (row, col, charac, attrib, repeat)    /* write char & attribute, */
  83.                         /* 'repeat' times | pg.178 */
  84.                 /* @ row & col, does not advance cursor */
  85. unsigned int row;        /* row position */
  86. unsigned int col;        /* col position */
  87. unsigned char charac;        /* character to write */
  88. unsigned int attrib;        /* character attribute */
  89. unsigned int repeat;        /* character repeat ( >0 ) */
  90.  
  91. /*-----------------------------------------------*/
  92.  
  93. painta (row, col, attrib, repeat) /* write attribute 'repeat' times | pg.178 */
  94.  
  95. unsigned int row;                /* row position */
  96. unsigned int col;                /* col position */
  97. unsigned int attrib;                /* character attribute */
  98. unsigned int repeat;                /* character repeat ( > 0) */
  99.  
  100.     painta (0, 0, HII, 80);    /* top row hi-intensity (non-destructive) */
  101.     painta (rd_row(), 0, UND, 80);    /* underline present row */
  102.  
  103. /*-----------------------------------------------*/
  104.  
  105. paints (row, col, string, attrib, repeat)  /* write attribute 'repeat' times */
  106.                        /* and then string */
  107.                      /* @ row & col, does not advance cursor */
  108. unsigned int row;             /* row position */
  109. unsigned int col;             /* col position */
  110. char *string;                 /* string to write */
  111. unsigned int attrib;             /* character attribute */
  112. unsigned repeat;             /* character repeat ( > 0) */
  113.  
  114. /*-----------------------------------------------*/
  115.  
  116. boxc (row, col, x, y, charac, attrib)       /* make box with 'charac' outline */
  117.  
  118. unsigned int row;              /* upper right corner row value */
  119. unsigned int col;              /* upper right corner column value */
  120. unsigned int x;                  /* box horizontal length */
  121. unsigned int y;                  /* box vertical length */
  122. unsigned char charac;              /* character for box outline */
  123. unsigned int attrib;              /* box outline attribute */
  124.  
  125.     boxc (10, 5, 8, 8, '*', REV);    /* 8x8 box of reverse video stars */
  126.  
  127. /*-----------------------------------------------*/
  128.  
  129. hlinec (row, col, x, charac, attrib)        /* 'charac' horizontal line */
  130.  
  131. unsigned int row;
  132. unsigned int col;
  133. unsigned int x;
  134. unsigned char charac;
  135. unsigned int attrib;
  136.  
  137. /*-----------------------------------------------*/
  138.  
  139. vlinec (row, col, y, charac, attrib)        /* 'charac' vertical line */
  140.  
  141. unsigned int row;
  142. unsigned int col;
  143. unsigned int y;
  144. unsigned char charac;
  145. unsigned int attrib;
  146.  
  147. /*-----------------------------------------------*/
  148.  
  149. hbarc (row, col, x, charac, attrib)        /* 'charac' horizontal bar */
  150.  
  151. unsigned int row;
  152. unsigned int col;
  153. unsigned int x;
  154. unsigned char charac;
  155. unsigned int attrib;
  156.  
  157. /*-----------------------------------------------*/
  158.  
  159. vbarc (row, col, y, charac, attrib)        /* 'charac' vertical bar */
  160.  
  161. unsigned int row;
  162. unsigned int col;
  163. unsigned int y;
  164. unsigned char charac;
  165. unsigned int attrib;
  166.  
  167. /*-----------------------------------------------*/
  168.  
  169. box1 (row, col, x, y, attrib)            /* make single-lined box */
  170.  
  171. unsigned int row;                /* see boxc */
  172. unsigned int col;
  173. unsigned int x;
  174. unsigned int y;
  175. unsigned int attrib;
  176.  
  177. /*-----------------------------------------------*/
  178.  
  179. hline1 (row, col, x, attrib)             /* single-lined horizontal line */
  180.  
  181. unsigned int row;
  182. unsigned int col;
  183. unsigned int x;
  184. unsigned int attrib;
  185.  
  186. /*-----------------------------------------------*/
  187.  
  188. vline1 (row, col, y, attrib)               /* single-lined vertical line */
  189.  
  190. unsigned int row;
  191. unsigned int col;
  192. unsigned int y;
  193. unsigned int attrib;
  194.  
  195. /*-----------------------------------------------*/
  196.  
  197. box2 (row, col, x, y, attrib)            /* make double-lined box */
  198.  
  199. unsigned int row;                /* see boxc */
  200. unsigned int col;
  201. unsigned int x;
  202. unsigned int y;
  203. unsigned int attrib;
  204.  
  205. /*-----------------------------------------------*/
  206.  
  207. hline2 (row, col, x, attrib)             /* double-lined horizontal line */
  208.  
  209. unsigned int row;
  210. unsigned int col;
  211. unsigned int x;
  212. unsigned int attrib;
  213.  
  214. /*-----------------------------------------------*/
  215.  
  216. vline2 (row, col, y, attrib)               /* double-lined vertical line */
  217.  
  218. unsigned int row;
  219. unsigned int col;
  220. unsigned int y;
  221. unsigned int attrib;
  222.  
  223. /*-----------------------------------------------*/
  224.  
  225. hlinet (row, col, x, attrib)            /* 2-to-1 T horizontal line */
  226.  
  227. unsigned int row;
  228. unsigned int col;
  229. unsigned int x;
  230. unsigned int attrib;
  231.  
  232. /*-----------------------------------------------*/
  233.  
  234. vlinet (row, col, y, attrib)            /* 2-to-1 T vertical line */
  235.  
  236. unsigned int row;
  237. unsigned int col;
  238. unsigned int y;
  239. unsigned int attrib;
  240.  
  241. /*-----------------------------------------------*/
  242.  
  243. box3 (row, col, x, y, attrib)            /* make 3-dimensional box */
  244.  
  245. unsigned int row;                /* see boxc */
  246. unsigned int col;
  247. unsigned int x;
  248. unsigned int y;
  249. unsigned int attrib;
  250.  
  251. /*-----------------------------------------------*/
  252.  
  253. prt_scrn ()             /* send screen contents to printer | pg.245 */
  254.  
  255. /*-----------------------------------------------*/
  256.  
  257. rd_keystroke ()                    /* read next keystroke | pg.216 */
  258.                         /* or wait until one present */
  259.                         /* also empties the keybd buffer */
  260.  
  261. /*-----------------------------------------------*/
  262.  
  263. rd_scancode ()                /* read next scan code | pg.216 */
  264.                     /* or wait until one present */
  265.                     /* also empties the keybd buffer */
  266.  
  267. /*-----------------------------------------------*/
  268.  
  269. rd_string (dest_buf, max_length)        /* read string from keyboard */
  270.  
  271. char *dest_buf;                    /* pointer to destination buffer */
  272. int max_length;                    /* maximum string length */
  273.  
  274. /*-----------------------------------------------*/
  275.  
  276. keybuffer_stat ()           /* reports presence of keystroke | pg.217 */
  277.                    /* returns "1" if TRUE */
  278.                    /* returns "0" if FALSE */
  279.  
  280. /*-----------------------------------------------*/
  281.  
  282. keybuffer_char ()               /* reports waiting keystroke | pg.217 */
  283.                        /* returns ASCII value */
  284.                        /* returns 0 if none */
  285.  
  286. /*-----------------------------------------------*/
  287.  
  288. keybuffer_scan ()               /* reports waiting scan code | pg.217 */
  289.                        /* returns scan code value */
  290.                        /* returns 0 if none */
  291.  
  292. /*-----------------------------------------------*/
  293.  
  294. window_afill (row, col, x, y, attrib)        /* fills window area with attrib */
  295.  
  296. unsigned int row;
  297. unsigned int col;
  298. unsigned int x;
  299. unsigned int y;
  300. unsigned int attrib;
  301.  
  302. /*-----------------------------------------------*/
  303.  
  304. window_cfill (row, col, x, y, charac, attrib)    /* fills window area with */
  305.                         /* charac & attrib */
  306. unsigned int row;
  307. unsigned int col;
  308. unsigned int x;
  309. unsigned int y;
  310. unsigned char charac;
  311. unsigned int attrib;
  312.  
  313. /*-----------------------------------------------*/
  314.  
  315. window_clear (row, col, x, y)        /* clears window area content */
  316.                     /* sets window area attribute to NOR */
  317. unsigned int row;
  318. unsigned int col;
  319. unsigned int x;
  320. unsigned int y;
  321.  
  322. /*-----------------------------------------------*/
  323.  
  324. window_save (row, col, x, y, buffer)
  325.                     /* save window area contents to an array */
  326.                         /* char values and attributes are paired */
  327. unsigned int row;            /*        must declare: char array[4000] */
  328. unsigned int col;            /* in calling program, to which *buffer  */
  329. unsigned int x;                /* writes (80x25x2=4000 positions)         */
  330. unsigned int y;
  331. unsigned char *buffer;            /* char array pointer for save operation */
  332.  
  333. /*-----------------------------------------------*/
  334.  
  335. window_restore (row, col, x, y, buffer)         /* restore window area contents */
  336.                          /* see window_save () */
  337. unsigned int row;
  338. unsigned int col;
  339. unsigned int x;
  340. unsigned int y;
  341. unsigned char *buffer;           /* char array pointer from save operation */
  342.  
  343. /*-----------------------------------------------*/
  344.